


























>ARA UNA BUENA CARGA 
)EL PROGRAMA EN TU ORDE- 
JADOR, COMPRUEBE . 
1UE LA CABEZA DE SU á 
‘LATINA ESTE 
.IMPIA Y EL 
VZIMUTH PERFECTA 
CIENTE AJUSTADO. 

LIMPIELA CON EL 
PRODUCTO 
SKUA. 


b 


c? 


e> 


LIMPIADOR DE RADIO CASSETTES 


BOLETIN DE PEDIDO 


Nombre yApellidos.. 

Dirección ... 

Ciudad.Telf.D.P. 

Deseo recibir. Limpiadores de cassettes al precio de 420 Ptas. Unidad. 

Forma de pago: □ Talón □ Contrareembolso □ Giro postal 

Remitir a GTS, S. A. - Bailón, n.° 20 - 1.° Izda. D.P. 28005 




































Queridos lectores 


^^onno os anunciábamos en el número anterior, ¡a 
revista de este mes lleva algunas modificaciones. La 
hemos estructurado en 3 partes. 

La primera es e! listado de los programas de este mes. 
De esta forma podéis ver como se han elaborado, e 
incluso podéis variar e intentar mejorarlos, con lo que 
conseguiréis conocer y dominar mucho mejor vuestro 
Spectrum, 

Qs encontrareis también con la sección de “IDEAS”, en 
ella os mostramos esos trucos siempre tan necesarios. 

Una página de bibliografía con los últimos libros 
publicados sobre el Spectrum. 

Y una encuesta que nos ayudará a conocer vuestros 
gustos, para seguir la línea de tus preferencias. 

Por favor, remitírnosla a nuestra nueva dirección: 

EDITORIAL GT.S, S.A. 

C/. Bailén 20, 1.° Izda. 28005 Madrid 
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EXPLICACION 



I IF INKEY*^- QR IHKEYf-'S 1 THEM 60 TO 99?? 
é FOR a=? TO 21: PRINT ilT 3,0;* 'iAI a,23i‘ 4 : NEKT a 

7 PRINT AT 20,0,,,, 

8 RESTORE 4: BATA 60,102,94,94,94,126,94,126,0,234, 183,253,253,255,254,0: FOR 
&=US« *a # TO U5R ‘cM; RÉAB v: POKE n f v; NEKT n 

10 LET a%«■ PARA LA CINTA BISPARA LA BALA ROJA COANDO ESTA CO 

INCIDA CON LA FLECHA, SI DISPARAS UNA NEGRA, PERDERAS UNA VUA.... PUL 

5A < SPACE > PARA DISPARAR..é SUERTES!» 

12 FDR H=1 TO LEN A**3l; PRINT AT Zl^iAflN TO N+31K ÉEEP 1/100,10: PAUSE 10: 
MEXT N 

20 LET P-0: LET V=3 
BO BEEP 1/2,I0: ÍEEP 1/20,30 
90 LET B=iNT EfiNHÓJ 
95 BO SUE 900 

ICO PRINT 09ER li PAPER BJ AT IÍ,BH2; IKK Oi 1 ’i INK 2i' 1 
120 LET B=B*i; BEEP 1/25,10! IF B>5 THEH LET B=0: PRINT OVER lí PAPER 8i INK Oi 
AT ifijlSí 1 1 

130 IF INKEYi 2 " 1 THEM 60 TO 300 
200 60 TO 100 

300 IF B=3 THEN LET HM+INT 1RNDI99ÍI LET P=P*H; LEI Bf=‘ “*STW H+* PUNTOS 

i 

301 IF B<>3 THEN LET B*=‘ R.I.P. *1 LET 9=Y-L 

310 FOR N=20 TO 30: PRINT AT 10,NíB»(N-l9ii■?': ÉEEP 1/lOOjH: PAUSf 2: NEXT H! 
PRIHT AT 10,315* * 

320 ÍF VíO THEN 60 TO 1000 

330 m N a l TO 10: ÍEEP I/100,H: PAUSE Ü-N: BEEP i/100,10-N: NEKT N 
340 PRINT AT 10,20, 

350 60 TO 80 

600 LET At-STW Z: LET 2S=‘60Q000 4 : L£T ZWK TO 6-LEN ARETURN 
900 LET Z-P: 60 SOI 300: PRIHT AT 15,22! f PT:’iZII LET Z*V: BO SUE 800: PRINT ¡A 
T 17,22*‘Vi:-íZ*¡ 1 ■: RETURN 

1000 BEEP 1,-10: LET Al=' GANE OVER PREPARATE PARA UNA HUEV 

A PARTIDA 50 TO 12 

9999 SAVE •REVOLVER"COD€ 16384,PEEN 23627t256lPEE« 23628-I63B2: GO TO 1 
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PUNTOS: 

RECORD: 

TIEMPO i 

0 

50 

378 


CRUZA EL PB5ILLQ 
DE LA MUERTE SIN 
QUE TE ALCANCEN 


LAS PIEDRAS 


TECLAS; 

X-IZQ. P-DER. 


PROCURO COMER EL 
HOYOR HUMERO DE BO¬ 
LOS QUE CO EN DE 
ARRIBO, PORO MOVER¬ 
TE USO: 

I : ■£ P : e£ 


1 IF IWCEY§=Y THEN GÜ TO 9999 

2 as : PRINT AT 10, HIPARA LA CINTAS PAUSE 200: LET R=0 

5 CLS : DATA 36, 102,167, 157 p 255,191 ,94,60,0,0,24,44,00,24,0,0: RESTORE 5: F0R 
t=USR V TO USR 'c'-U READ lli PÜKE z,zi: NEXT i 
h PRIHT FLASH 8¡AT 21,5!'PULSA (S> PARA EMPEZAR"; lf IRKEY*= , s l TH£H SO 10 B 
7 00 TG 6 
@ LET HJSR 21370 

10 CLS : LET C=Ül FOS Z=1 T0 20: PRIRT AT Z,Q¡ FLASH lí IWVERSE C¡ PAPES 2¡‘ 1 
iAT Z,3ií 1 *íAT 2,1; INVERSE Oí FLASH Oí PAPER 3S' "Í*T Z,23S- 

LET C=e+i: IF DI THEN LET DO 
LZ HEXT Z 

13 PRINT AT 0,05*? ??????????????? 1 

14 PRIHT AT 21,0;' ????????????????' 

15 LET X=19; LET LET B0=50: LET P=0 
&0 LET XB=U UT YB=9*IHT LRNDÍ14Í 

90 G0 SUS 500 
95 LET MSR 23430 

100 PRINT AT XEjVB;' LET XE*XltJ; PRINT AT XB,YE! 

110 PRINT AT t t yV ’í IF lHKEYf= J i 1 THEN LET y=y-l¡ IF y<9 THEH LET y=9 

111 IF IiKEYí=V THEN LET y-yH\ IF y >22 THEH LET ? =22 
120 PRIHT BRISKT HAT x,?; *?" 

130 IF i=Jb THEH IF y=yb THEH LET T=USR 23340: LET p=p+l: 80 T0 200 
140 IF sbH? THEH LET 3=USR 23460: SO T0 200 
190 60 TO 100 

200 PRIKT AT *í LET bO=b(H: IF bo<0 THEH 60 T0 1000 

202 LET íb-H LET yb=9UNT IftNDfl4l: 80 SUB 500: 80 T0 100 
500 PRINT AT 4,2í"PTi'jPjAT 4,25;"BO!'?BGit 1 1 AND BÜÍlOl 
505 fiETURN 

1000 PRINT AT lOjlií l SAHE OVES 1 

1005 POR z=l TC 5: LET MSP 23370: LET MSR 23400: HEXT z: GO TO 6 
9999 3AVE 1 GLOTON'CGDE 16384,PEEK 23627+256TPEEIÍ 23620-i£382: 60 10 1 


1 IF 1NKEYS="g É THEH GG TQ 9999 

2 CLS : LET r=0: PRINT AT 10,101"PARA LA CINTA": PAUSE 200 

3 PÜKE 23693,71: BURDER 0: CLS 
5 PDXE 23675,0: PÜKE 23676,91 

10 PRINT PAPER 7? INK 2}AT 0,0i *???????????????????????????????? 1 ¡AT 15,01'??? 
?????????????????????????????*: FOR N“1 TO 12: PRINT PAPER 7! INK 25AT N f 0¡"?"í6 
T N f 3l;'?"I NÉXT H 

12 PRINT INK 5IAT 13 t Qi‘7‘íAT Í3«31i fl ? H lAT lA.Oi^'íAT H,Jli # ? É 

14 PRINT INK 3jfcT ¿6,01*????????????????????????????????*iAT 21,Oí'??????????? 
?????????????????????': FÜR N=17 TO 20: PRINT INK 3iAT H,C¡“?'?AT H,3I¡HEXT 

15 PRIHT AT IB, 2¡‘PUNTOS: RECORD: TIEMPO:" 

16 PRIHT AT i?,ZrO-;AT 19 f 12ir 

20 LET t=500: LET 4=K LET p=Q: LET X=14: LET M! DIN R(14,21 
25 FOR N=1 TG 14: LET H=2fN: LEÍ I=UIHT (RNM14): PRINT AT I,H|*??': LET RtN, 
U=I: LET R!H P 2DH: EEEP 1/50,0: NEXT N 
90 LET j=31: GO SUB 9040 

100 IF INK£Y*=-p- THEH GÜ SUB 9000: LET y=y*l: GO SUB fOlü: PRIHT AT i^i'Z'iAT 
x-l^i"? 1 

105 IF INKEVI =, i* THEH 60 SUB 90001 LET r = r i: 60 SUB 9010I PRIHT AT *,*i , ? l iA! 

t-iav?' 

110 IF y)l AND y(30 THEN IF rUHT íy/2> ,!>=)< GR rUHT iyt2) p ü=3C-£ THEH GÜ TÜ 5 
00 

120 LET h-IMHT 1RHDÍ14K PRINT AT r(fc,n,r(h,2)í" "1 LET ríh,I)=rlh, 11+1: IF 
r(b,mi4 THEH PRIHT AT HjHMJí 1 ??": BEEP 1/70,-10; PRINT AT 14,r[h,2)r '1 
LET r(h,£J-j 

122 PRIHT AT rth,1},r(h,23;"??" 

130 LET tH-í: IF UÚ THEN GO TÜ 500 
132 PRIHT AT 19,25;tí' " 

140 IF 6=1 THEN IF y-Z 0 THEN LET p=p*50: LET 6=2: PRINT AT 19 f 2íp: BEEP 1/2,101 
EEEP 1/10,30: LET j=C: SO SUB 9040 

145 IF 6*2 THEH IF y=I THEH LET p=p*5Q: LET 4=1: PRIHT AT 19,2¡p: BEEP 1/2,10: 
BEEP 1/10,30: LET i*3lí 60 SUB 9040 
ZOO GO TO 100 

500 IEEP 1,-10: FOR n=l TQ iil BEEP 1/50,n+10: PRIHT AT 13,yi INK 6-n/2¡'?'¡AT 
14,yi"? 1 : PAUSE 12-n: BEEP 1/50,10-ní NEXT n 
600 IF p>=r THEH LET r=pl FOR n-í TO £0 STEP 3: BEEP l/50,n: NEXT n 
700 PRIHT Alí'OTRA PARTIDA? IS/H) 1 

800 PAUSE 43: BEEP 1/50,30: IF INKETDV THEH RANDDHIZE USR 0 
805 IF INKEYDV THEH 60 TO J 
BIO 60 TC B00 

9000 PRIHT AT x t yV "íAT j-I,yí É 1 

9010 IF y >3Ü THEH LET y=30 

9011 IF yíl THEN LET y=l 

9012 RETURH 

9040 FÜR n=l TG I0í BEEP 1/50,n: PRINT QVER 1}AT lSJí'P'íAT 14,jl'?': PAUSE 10- 
n; BEEP 1/50,10-n: HEXI a; RETllRN 

9999 SAVE 'PASILLÜ'CODE 1Ó384,PEE!Í 23fi27^5£ÍPEEK 23620450-16354; GO TÜ 1 
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PT:60 RC:0 FRSE:2 UI:£ 


DIRIGE R LO SERPI¬ 
ENTE PORO GUE COHR 
LOS TRRROS DE HER- 
KELRDO Y EVITE LOS 
VACIOS.TECLOS: 

0:fr Z :■& I :*> P:c* 


1 IF INKEW**9' OR HKETN'S* THEN 60 TO 9999 

2 CLS : PRINT Al 10,10;TARA LA CINTA'; PAUSE 200: LEI B=0: CL5 

5 PRIHT AI 21,01’ PULSA (Sí PARA EKPE2AR V If INKETS=*s' TH£H CLS : 

eo ro jo 


é 

6Q ;o 5 




10 

LET v=3: LET p=Ü: LET f=l 




§0 

LET C=0: LEI d=l: SO SUB 1000 



P 

?ü 

LET 1 o=Ü: LET ai="l LET *=10; FOR 

II 

“i 

O 

IF ATTR 

lx,j]=3 THEN LET :=c 

♦I 





?i 

PRINT IKK £ i AT x,y¡'?": LET ai=aí*CH« *Km 

f. NEXT j 

'1 LET y=y-l 

100 

IF INK€Y*=-q B THEN LET d=2 




101 

IF INKEYfs'z' THEN LET d=3 




102 

IF MEYf=V THEN LET d=4 




103 

IF 1HK£ YS="p" THEN LET 4H 




no 

IF d=i THEN LEI y=y+1 




m 

IF 1=4 THEN LET y=y-í 




n; 

IF 1=2 THEN LET *=x-I 




:n 

F d=3 THEN LET 




115 

LET at=ai*CHRf x+CHRf y 




120 

IF ATTR íx, ¡rí=58 THEN 60 TO 300 




121 

!F ATTR <x,yí=3 THEN LET c=c*lLLET 

1d=4: LET 1 

t=USR 23340: LET p=p*5: PRINT 


AT 21,3;p: LEI >p=ltRRSílí; LEI yp*l*RNM29: IF SCREENS íJtp,ypl =1 * THEN PRINT 
INI! 7¡AT «p,yp¡'7‘ 

122 IF c>*10 THEN 60 T0 2S0 

123 If ATTR I>,yl=6 THEN 60 T0 300 

124 IF ATTR < x,y)=71 THEN 60 TU 300 

130 PRINT AT X,j! IKK i;*? 1 ! INK 7;AT COOE atlll,COÍE al(2)¡* 1 
135 IF loíO THEN LEI lo=lo-l 
MO IF ¡0=0 THEN LET a*=a*l3 TO 1 
200 60 TO LOO 

250 LET !=USR 23430; LET 4=H¡! 60 TO 20 


300 LET l*USR 23440! LET v=v-ll !F *<0 THEN SO 70 400 
305 60 TO 20 

400 PRINT AT 9,11¡‘6AKE OUER'l FOR a=l TO Si LET 1=USR 23400; LET 1=U$R 23370; 
NEXT a 

410 IF p>r THEN PRINT AT 11,101‘NUEVO RECOMI' 

420 60 TO 5 

1000 60 SUB lioo; PONE 23693,7 

1001 IKK j: FOR 1=1 TO 10 

1002 LEI s c J * INI IRNÍ4J8): LET y=UINT IRN1129I; IF xOlO AND SCREEN* tj,yl=‘ • 

THEN PRINT AT BEEP 11100,20: NEXT z¡ 60 10 1010 

1003 60 TO 1002 

1010 INK 7! PRINT AT 21,9; , PT:'iF!AI 21,101‘RC;-;R¡AT 21,20;'FASE; , ¡F¡AT 21,28¡' 

vi:*ítf 

1099 REIURN 

1100 BORBER 0: PONE 23693,7: CLS I PONE 23693,58; PRINT AT C,0¡ , ?'’”7??”?5 ,, ”?7 

¿9,05 ^: FQR i -1 TO 18: PR 

INI AT ijOi^iAT i,W'Vi NEXT i 
1102 If H2 TWEM RETURN 

1110 FOR r=l TO B: PRINT AT i f ifl; , ? , ¡AT z+lO^lOíIF *>2 THEN PRINT AT t t 2U* 
7'íAT í+IOíZU 1 ?* 

1112 NEXT 2 : IF f<4 THEN RETÜRH 

1120 FOR i=3 TO 16t PRINT AT z J 5í , ? , í IF 04 THEN PRINT AT z f 26¡ ir 

1121 NEXT 2 

1125 IF 05 THEN PRINT AT 3,141“????- 

1126 IF f>é THEN PRIHT AT 16,14i*????* 

1200 RETURN 

9m SAVE *SERPIENTE 1 CODE 16334 p PEEK 23627t?56fPEEN 23628-16362: 60 TO 1 



ESTE PROGRflHR HIDE 
TU VELOCIDAD |>E ES- 
CRITURfl EH TU ZK, 

Y EVflLUR TU QftPHC1 - 
DRE> DE HECftNOGRftFO. 
CRRGRNDO 
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i IF INKETt^g" m INKEYf-'G 1 * THEN 60 TO 999? 

l ECRDI.fi O! POKE 23893,7: CLS i PRINT IT 10*10i"PARA LA CINTA"! PAUSE 200: CL 
S 

10 PRIMT AT 0,0; 1 TEXT DE MECANOGRAFIA: 1 *it. m 

15 RESTQRE lOOO: IF RNB>.5 THEN REAS i* 

i? DEF FN tU = C¿553é*PEEK 2367«4+25é*PEEK 23673+PEEK 23872 W30 

18 PRINT AT 2,1|"Preparado que «apenaos,... 4 

J9 BEEP 2,10 

20 REAS ai: LET aS=*1234S67B? *+il 

30 PRINT AT 1,01a*: PRIKT AT 11,01"..—--- B |CHW 81 

35 BEEP 1/5,30 

38 POKE 23872,0: POKE 23873,0! POKE 23674,0 

40 PRIMT IHKEYIi I PAUSE 60: IF FN tU>ÓO THEN SO TO 100 

50 60 TO 40 

100 PRIMT MIC OS 1 !'! PRIMT INK 3J"-*.—... 4 

UO LET f*0! LET x=I2¡ LET y=0! FOR fl=l TO LEN i* 

112 IF SCREENf ii í yl= 1 M l THEM 60 TO 200 

113 IF SCREEMS lx r yK>iHní THEN LET t=tHí BEEP 1/50,20: PRUT BRIGHT 1JAI x J? 

i dvee ir_- 

114 LET j*y*U IF ?>3i THEM LET y=0: LET *=xH¡ IF 021 THEN LET x*2í 


120 NEXT n 

200 PRIMT OVER ijAT 1,0;** 

210 PRIKT AT 2,0; 1 PULSACIONES......"iH 

211 PRIMT : PRIMT 4 FALTAS..„'iF 

215 LET Bf=* ESTAS SUSPENSO 1 


220 IF KM49 THEN IF F<16 THEN LET B*= 4 * APRUEBAS EL I CURSO 1 

221 IF M>200 THEN IF Fié THEN LET ll-'APRUEBAS EL 2 CURSO* 

222 IF N>24? THEN IF F=0 THEN LET B*= 4 APRUEBA5 ÉL 3 CURSO* 

230 PRIKT BRIGHT I ¡AI 7,16-lEN BI/21BI 

240 FOR N=1 TO 300: N£XT N; PAUSE 43: PAUSE 01 RUN 10 

1000 SATA 1 * En todos ios ejercicios del Netodo queda prohibido terainmteaente e 
t tipleo de goa* de borrar, Cd»q sabe ios, los ejercicios decopia de escritos cor 
rientes quecontengan aas de 5 faltas deben tintinarse por coipleto, y repetirse 
integramente hasta conseguir tenas de 5 faltas, 4 

1001 BATA 1 La pratica trae la perfección, se oye decir a veces, lo cual escoap] 

etaiente incierto. Si una persona practica i»1, por ignorancia o por vicio, jaa 
as lograra la perfección. Bebeaos, pues, enaendar lo dicho afi 

raanda: La practica adecuada trae la perfección. 1 

9999 SAVE "PULSACION'COSE 16384,PEEN 23627+256ÍPEEK 23628-16382: 60 TO 1 



12 3 4 567 S 9 

En todos los ejercicios de t Me t 
odo queda prohibido terminan teme 
n t e el empleo de goma de borrar. 

Como sabemos., ios ejercicios de 
copia de escritos corrientes que 
contengan mas de 5 faltas deben 
terminarse por completo, y repet 
irse integramente hasta conseguí 
r menos de 5 faltas. 



CLASIFICA CflDR UHO 
T>E LOS 20 IHSTRUH . 
EN EL GRUPO OUE LE 
CORRESPONDA: 

CUERDA i UIEHTO O 
PERCUSION... 


PREGUNTA NUMERO’ 1 

INSTRUMENTO: OBOE 

fi CU R L DE LOS TRES GRUPOS DE 
INSTRUMENTOS PERTENECE ? 

1- CUERDA 

2- UIENTQ 

3- PERCUSION 


i IF METIAS 1 GR INKETM'g" THEN 60 T0 9999 
10 CLS : PRIMT AT 10,10;"PARA LA CINTA": PAUSE 200: CLS 
15 POKE USR V,BIH Q001110Q 

20 PRIMT AT 10,01" INSTRUMENTOS MUSICALES "1 FOR A=1 T0 30! BEEP 1/10, 
RKBIÍO! HEXT A 
90 LET AC=Q 
100 FOR N^l TG 20 

110 BEEP 1/2,10: BEEP 1/10,20! LET H=INT (RNBIJl! RE STORE lOOO+ÜOOiH) 

112 REAS Rl,NUN 

120 LET N1=INT (RNDÍNUPt): FOR A=1 TO Mi! REAS II! NEXT A 
130 CLS ! PRIMT AT 21,0!* "iAT 0,01" IMSTRONE 

MT0S MUSICALES "PREGUNTA NUMERO! É iN'"¡" INSTRUMENTO! 'i FLASH ÜJ*í 

FLASH 0r'‘l CUAL BE LOS TRES GRUPOS BE 4 " * "INSTRUMENTOS PERTENECE ?‘" m i- CUEft 
DA 11 *" 2- VIENTO"”" 3- PERCUSION" 

140 IHPUT "GRUPO 11-31¡"SKI LET KMC-i 

141 IF k(0 OR k>2 THEN BEEP 1,-10: GO TO 140 

150 IF K=H THEN PRIMT 1 *‘CORRECTO "iR*: LET A[=ACH! BEEP 1,20! FOR A=0 TO 1501 
OUT 254,A: NEXT A! BQRDER 0 

151 ¡F ¡CON THEN PRIMT M "INCORRECTO.* 1 ""LA RESPUESTA ERA; "¡RV BEEP 1^-10: FO 

9. A-I 10 51 BEEP i/10 r RNM10; NEXT A 

190 NEXT % 

200 CLS : PRINT 1 RESULTADOS! "¡IT 21,01" INSTRUMENTOS NU 

BICALES 

210 BEEP 1/2,10: PRINT A? 5,7;"ACIERTOS.*;AC;AT 7,?í"FALLOS.,¡20-AC 

iAT 12,7!"PORCENTAJE: 'jttftf'V 
212 BEEP 1/20,30 

220 PRINT AT !9 f 7í"OTRA PARTIDA ES/N1" 

300 PAUSE 43: BEEP 1/50,301 IF INKETI-'S" OR INK£Y*= , s" THEN RUN 20 
310 IF INKEYf=V OR MKEYf='M" THEN RANDONIZE USR 0 
320 60 TO 300 

1000 BATA "CUERDA",13 

1001 DATA "VIOLIN","VIOLA","VIOLONCELO","CONTRABAJOVLAUbVGUITARRA","BANDURRI 
A 1 ,"BANJO*,"ARPA"/CITARA", "CLAVECIN", "ESPINETE",. "UKELELE" 

1100 BATA "VIENTO*,23 

1101 DATA 1 FLAUTA",'FLAUTIN YOMYDULZAINAyTÉNORAV CLARINETE VFASOT Y CAR 
ANILLO","TXISTU", 'GAITA 1 , "TROMPA*,'TROMPETA',"CLARIN","TROMBON","CORNETA",* FIK6 L 
A*, "BUSLE 1 ,"TUBA","CUERNO 4 ,"SAXOFON","ORGANO","ARMONICA 4 ,"ACORDEON" 

1200 BATA "PERCUSION",15 

1201 DATA "TRIANGULO","PLATILLOS*,"CANPANA","SONS","TAMBOR","BQNBG","TIMBAL 4 ,*PA 
NBERETA", "MARACA","CASTA7UELAS", "PIANO","XILOFOMO","CLAVICORDIO*,"CELESTE","NARI 
NBA 1 

9999 SAVE "IHSTRUNEM'COBE 18384,PEEK 2362?r258IPEEK 23626-ÍÓ382: GO TO 1 
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ODY 



1 ir iNKEK$=*6' QR INRETÍ=*9' Th 
EN 60 T0 9999 

10 PURE 23693,7: BORDES Oi 60 SUE 9000: PRINT AT 12,10¡'PARA LA CINTA 1 : PAUSE 


CARGANDO 


COMPONE CON HELODV 
DE LA FORHA HAS FA¬ 
CIL.» LAS HELODIAS 
QUE DESEES. 


200 

20 DIN AID: LEI N=! 

100 60 SUB 9000 

DO PRINT AT S,Í2;* MENU ’¡AT li,8¡’l- CREAR MELODIA'iAT 13,3¡’2- ESCUCHAR M 
ELUDIA" (AT 15,81'3- GRABAR MELODIA'5AT 17,8¡*4- CARGAR MELODIA*;AT ¡9,8;‘5- FIN 
ALIZAR’ 

120 IF IMCE?*='r THEN SO TO 1000 

121 IF INKEy$=’2' THEN 60 TC 2000 

123 IF 1MKEV*='3* THEN 50 TO 3000 

124 IF INKEY*='4' THEN SS TO 3500 

125 IF INKETÍ^Í' THEN RANDGMI2E USR 0 
130 60 TO no 

IODO 60 SUB 9000: INPUT 'LONGITUD DE LA MELODIA:*íH: INFUT 'DURACION EN SEG.DíD 
1010 DIN AíN) 

1020 PRINT AT 9,0¡’ AHORA A CADA TECLA DE TU MICRO "■'TIENE ASIGNADO UN SONIDO 
CORRES-"" PONDIENTE A SU <C0DE?' 

1030 FÜR B=1 TO N: FAÜSE 0! LET AtB!=COD£ INKEYÍ-SO: PRINT AT 21,0,'NOTA:’;B,'VA 
LOR: "AIB),: BEEP D.AIBK NEXT B 

1040 60 SUB PODO: FRIN7 AT 12,71 'MELODIA FINALIZADA’: FOR B-l TO 500: HEXT E: 60 

TO 100 

2000 60 SUB 9000: PRINT AT 12,6;'REPRODUCIENDO MELODIA’ 

2010 INPUT 'DURACION EN SE6.:'¡D 

2012 FOR B=1 TO N: BEEP D.AtBi: NEXT B: SO TO 1040 

3000 60 SUB 9000: INPUT 'NOMBRE:" LINE A$: PRINT AT 8,01"PULSA RECORD*: SAWE A* 
DATA Al): PRINT : PRINT "VERIFICANDO "AS: VERIFT Ai DATA Allí PRINT í PRINT *0 
R. ';Aí;' GRABADO.' 

3010 FOR B=I TO 500: NEXT B: 60 TO 100 

3500 60 SUB 9000: INPUT 'NOMBRE:" UNE Aí¡ PRINT AT 8,0;'PULSA PLAY*: LOAD AS D 
ATA Al): PRINT ’0K. * i ASi * CARGADO.': 60 TO 3010 

8999 PAUSE O 

9000 FOR 1=6 TO 21: PRINT AT z,0,,: HEXT z: RETURN 

9999 SAVE 'MELODY'CODE 16384,PEER Z3627*256*PEEK 23628-16382: 60 TÜ 1 
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DIBUJO EliPLEBHDO. 
CIRCULOS. TECLRS: 
O : if P ;«*• Z:Q 1:4= 
S : SflUE POHTOLLO 
LSLOOD PflHTftLLfl 
R : IHICIRLIZRR 


1 IF lHKEY*='g* THEN 60 T0 999? 

2 print at io^ lo; ‘para la cinta*: pause 200: cls 

10 INPUT ‘BORDES,PAPEL,UNTA:'jíj , ; , JPí , : , ¡T! BORDES B! PAPER PI INK T! CLS ! 
PLCT 0,0: ORAN 255,0: OSAS 0,175! DRAH -255,0: DRAN 0,-175: INPUT 'X!*)X,'Y:'¡Y! 
Ik D, j T -RADIO DEL CIRCULO:*;S: INPUT ‘PASOUiP 
100 1P INKEV*=*I‘ THEN LET «y-p; IF y(0 THEN LEI y=0 
102 -F INKETÍ="q' THEN LE' y=y*p; IF y>!75 THEN LET y=175 
104 IF INKEYi-'i' THEN LET *=s-p: IF x<0 THEN LET x=0 

106 IF INKEY$=‘p* THEN LET IF *>255 THEN LET *=255 

107 IF INKE^’r' THEN 30 TO ¡0 

108 IF INRE^'s* THEN INPUT at: ?AVE aíSCREEN* 

109 IF INKEY$="I' THEN INPUT a*: LOAD aíSCREEN* 

110 CIRCLE it,y,i> 

200 60 TO 100 

9999 SAVE ’CIRCLERAHA'CÜDE !6384,PEEX 23é27*?5éfFEEK 23628-16382: 60 TO 1 
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1 1F IKNEYI=’S* OR INKEYt='<¡’ THEN 60 TO 999? 

2 CLS : PRINT AT ÍO,10;'P4RA LA CINTA*! PAUSE 200: CLS 

5 1NPUT ’PAPEL.BORDEJINTAl'lPi'l’IBl'l'iT: PAPES P: B0R3EF E: INP !; CLS 
10 INP1T ‘GROSOR I! TG 40!:*;G: INPUT ’AHCrO [Q-«0!:*|Í1, ‘ALTO ¡0-4C.I:';v•: IN 
FUT * CONCENTRACION ÜO-lOQIl’iC 
» CLS 

ICC FCR A=C "O 2tfJ 3-EP PNC 
110 LET x=CGS Aív¡: LET V =SIK At'I 
120 CISCLE !*í27,y«87,S 
130 NEr 4 

l«c 3W ’S-SAVE R-ENPEZAR F-FIK OPCION ‘¡ UNE AI 
145 POKE 23658,8 

150 IF A*=*S’ THEN INPUT ’NONBRE:"¡í*: SAVE ÍISCREEN* 

151 IF »«=■(“ THEN 60 10 10 

152 IF 41=’F' THEN RANBOMIE USR O 
1K 60 TO 140 

9999 540E ’ÍONSTS'CODE 16384,PEEN 23627*25S1PEEK 23428-16332: GO 'O 1 


1 IF IHKET*= J g‘ OS 1W(ETI=’S’ THEN SO TO 9999 
5 GO 308 900: PR1NT AI 12,101‘PAPA LA CINTA': PAUSE 200 
10 80 SUB 900: PRIHT AT 8,01’EL SE NONES Aí CS, ES UNA 5UBRUTINA” "EN C/N REUBi; 
ASLE.'''‘ESTA RUTINA RENONER» A PARTIR JE*’"LA LINEA S CON UN INTERVALO 3t I' ' 
'TOOOS LOS: GGTü,SQSilB|U$T,LLI5T" ' 'RESTORES,5AVE,. ,LINt,ETC,..' 

20 80 SUB loco; 80 SUB 900 

25 PRINT AT 8,01'PARA USARLA HAZ! "''3- PRIAERA LINEA A SENUNERAR" ‘*1- INTEíi 
ALO ENTRE LINEA Y LINEA' ’ ” 'PONE 26286,1; PONE 26288,5-254T INT (SI2561‘.PONE 2e2E 
9,3NTiS/256!' 

30 SO SUB 1000: GO SUB 900 

40 PRINT AT S.Oi'BATOS SOBRE LA RUTINA!" "INICIO: 26000"’ ’LDMITUL: 6S3 B«t 
ps ,M 'FINAL: 26680’”'USO: RANÍ0NI3E USR 26000’ M, CAR6A: CLEAR Z5999;LÜAD‘"'CG¡ 
E '¡AT 21,01’DESEEAS GRABARLA APASTE? IS/N)’ 

50 INPUT UNE AI: IF A*=’S' O* A*=V THEN GAYE ’RENUNERA’COÍE 26000,661 
60 AS=’N' OS A*=’THEN RAH00NI2E USR O 
70 GO TO 10 

900 FÜR 2=7 10 21: PRINT AT 2,0,,: NEXT 2: SETURN 
IODO PRINT AT 21,01'PULSA UNA TECLA FARA SEGUIR))!»" 

1010 IF INNEYIO" THEN BEEP 1/2,101 BEEP 1/20,30: RETURN 
1020 63 TO 1010 

=999 SAVE ’RENUNERA'CODE 16384,10300: 80 TO 1 
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DESCUBRE EL AS DE 
TREBOL DESPUES DE 
QUE EL ORDENADOR , 
BARAJE LAS CARTAS 

CRRGAHDO 


1 IF BKEÍt*'S* OR IHKET*=*9* IHEK 60 TO ÍÍW 

2 60 SUB B1Q61 PSiRT « 12,101'PARA LA CINTA'! PAUSE 200 

3 POSE 23475,0: POKE 23474,91 

10 0IN «13,21; LET LET «12Í=*5?*; LEI 

20 LET P=ü: LET VIMOS SO SUB 9100 

30 PRINT AT T.Si'PT:*!: LET Z=P: 60 SUS 9200! PftINT Z*¡AI 7,201*VI:"i! LEI 2=9 
I: SO SUB 9200: PRINT ZS! SO SUB 9050 

35 IF 91=0 IHEK PRINT AT 21,101'SANE AVER': FQR N=1 TO 255: OÜT 254.N! KEXT N 
: SORBER o: SO TO 20 

40 LET v=l! FOR n=l TO 3: 60 SUB 1000; NEXT n 
SO PRINT AT 21,4;'ELI6E TU CARTA 11-31:' 

60 PAUSE 0! LET Z*=INKEY*: BEEP 1/50,30: IF ZS<' 1' OR ZIX'3' IHEK SO TO SO 
45 PRINT AT 21,0,, 

70 LET N=VAL 2t: LET Z=VAL IBÍIH1I: LET V=0: 60 SUB 1000 
72 IF D*(Z,1)=■1* THEN BEEP .5,10: BEEP .5,12: BEEP .5,111 BEEP ,5,10! BEEP 1, 
9: LET P=P*lNt IRNM20HJ 

75 IF BUZ, 1)0*1' THEN BEEP 2,-10: LET VI=VI-I: FOR H=¡ TO 3! LET 9=0! 60 SUB 
10A0: BEEP 1/2,N: HEXT H: FOR N=l TO 150: NEXT N: BEEP 1/50,30: POR N=1 TO 3: L 
ET 9=1: 60 SUB lOOO: BEÍP 1/100,0: HEXT N 
SO 60 TO 30 

1000 LET 1=10: LET y=24t4ín>: LEI «=«IVAL btinl) : 60 SUB 9000: PRINT AT 1*7,y* 
1¡ PAPER irO*¡n! RETURN 

9000 IF 9=1 THEN PRINT PAPER 75 INK 2¡AT «.y}*????'¡*T i*I,yí*????'?AT *+2,yí'?? 
’P'IAT *i3,y¡*????'¡AT fH,y¡'??P?*iAT JO-S,?!*????* 

9010 IF 9-0 THE* PRINT PAPER 7;AT *,yi* '1 IKK OicíllliAT )<t3 p yj■ 'i INK 2¡C 

*42) í AT *♦ 2, y i * ' I AT x«3,yí * '¡AT *t4,y¡rt(ZI¡' *¡AT x*S,y¡ IKK 0)«!1)¡ 

1 ■ 

9015 IF *=2 THEN PRINT PAPER QíAT í i7 ¡’ ‘JAT ' *jAT x*2 t y\' '¡AT 

x+3,yi l 1 ? AT x*4,y í 1 1 i AT ^S^í* * 

9020 RETURN 

9050 LET bS="! LÉT a*=M23*; FOR i=J TO 3: BEEP l/ÍQ,RNOílO! LET b=l+IKT \mti 
EN afk PAUSE b*5: LET b§=bt+iitb): LET a$=at[ TO b-maflb+1 TO 5! HEXT a 
9052 RETURN 

9100 FQR 1=6 TO l\\ PRtKT AT z,Q fJ ; NEXT i: RETURN 

9200 LET Nt^OOOCQO'! LET ZÍ^STR* l\ LET ZS=HÍ1 TO Ó-LEN 2*5+21: RETURN 

9999 SAVE p AS-TREBOL'CDDE UÍBAjPEEX 23627 + 256 ÍPEEK 23 Í 2 B- 1 É 38 Z: SU TO I 



INTENTA LOGRAR CON 
TU <RACING DAR> EL 
HEJOR TIEHPO. 
TECLAS: 

I ! 4= P:^ 9 R 
CARGANDO 


□ P □ O □ □ 

□ □OOP □ 

□ O O O ü x □ o 

u o o □ o o □ 

□ □□□□□□□□□□□□□□□□□□□□□□□□□□ □ 

Q □ □ 

a □ o 

□□□□□□□□□□□□□□□□□□□□□□□□□□ o o 
a p o 

a p o 

□ □ 

O P o 

□ P o 

□□□□□□□□□□□□□□□□□□□□□□□□□a P P 

□ □ o 

□ O P 

a □oooppnpoappQpppopooppoopp p 

□ S p 

O P 

^PPPPPnPPPOQDPPPQPPOPPOPPQPPODPF 


I IF INKEY*= p g 1 THEN SO TQ 9999 

1 CLS ; PRINT AT tO,IOS'TMRA LA CINTA 1 ! PAUSE 200: LET TR=99.99 
3 RESTOSE 3: DATA 24,189,255,109,36,165,255,189: FOR n=USR V TO U5R 'V-i: 
REÍD v! POKE ffl,ví NEXT n 
10 POKE 23693,32: BGRDÉR 4! CLS 

15 DEF FH TI) = 165536TPEEK Z3674*25éfPEEK 23673+PEEK. 236725/50 
20 LET XB=20: LET YB=I2! LET X=20! LET T»I2: LET M0! LET C=i0 
90 FOR efO TQ 21 ¡ PRINT AT r^Oj 1 ■; NEXT n 

92 PRINT AT 20,9;' ? 

98 PAPER 8¡ INK 8: BRI6HT 8! BEEP 1/2,10: BEEP 1/20,30 

99 PAUSE Oí POKE 23672,0! POKE 23673,0! POKE £3674,0 

100 IF INKEYÍ^q 1 THEN LET x=x-lí IF ti2 THEH LEI i*2 

102 IF INKÉYt^a' THEN LET i=*Hi IF *>20 THEH LET i=20 

104 F MEY**V THEN LET y=y- 1: IF yíQ THEN LET y=0 

106 EF INKEY*=y THEN LET y=y+l: IF y>31 THEN LET y=3í 

Í10 PRINT AT xb,yl)i* '|AT *,y¡*?'; LET xb=x: LET yb*y 
114 IF ATTR THEN 60 TO 300 

U5 ¡F ATTR (k, y 5 056 THEN BEEP 1/AÍTS t*,y) f 10: LET i=i* 1: IF i>20 THEN LET t= 
20 

110 LET I=USR £3296 

120 LÉT c=CTRNH2-RNDi2: IF e>24 THEN LET c=24 

121 IF c<l THEN LET c=I 

122 PRINT AT 0,c; p 

130 LET k=k+i; IF k=30Q OR fc=3Ql THEN PRINT AT 0,1:1 * 

132 IF k>325 THEN 60 TO 300 
200 60 TO 100 

300 BEEP L/2 t 10: BEEP 1/20,30: CLS ! LET tl=FN tü! IF tl<=tr THEN LET tr=tl: P 
RIHT 1 HUEVO RECORD* 

305 PRINT B Tinpoi , itl ,, R«ttrt: , Ur 
310 PRINT AT 21,Oí*OTRA PARTIDA? CS/Hl 
320 IF INKEY4= t 5* THEN 60 TO 10 
322 IF INKEYS=V THEN RANDONÍZE USR 0 
330 60 TO 320 

9999 SAVE 'RACINE'CQBE 16384,^EEX 23fi£?+256*FEEK 23628*16382: 00 TO 1 
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2100 PftIHT : PRINT ’£L LEON, REY DE LA SELVA... — TE HA ENCONTRADO'’'‘KO PUEDES 
HUIR DE EL... 1 : SO TO 900 

2200 PRINT : PRINT 'NO DEBISTE ENTRAR AL NAR...•'■'PUESTO 8UE ESTA INFECTADO DE. 
TIBURONES..,■: 60 10 900 

2300 PRINT I PRIKT 'ESTAS EN EL LUSAR DE PARTIDA,""AtíII VINISTE A PARAR OVANDO 

.,.”''NAUFRAGO TU BARCO.""ENCUENTRA LOS TRES COFRES T LAS" "LLAVES PARA ABRI 

RLD3"'"V DIRIGETE A UNA ZONA HABITADA’: RÉTVRN 

2500 FR1NT I PÑlNT ‘TE ENCUENTRAS EN LA PLATA...': RETURN 

2700 PRINT ; PRINT *TE ENCUENTRAS FRENTE AL RIO. ..""CRUZAS?': 60 SUS 9000 

2710 If R$='S' THEH PRINT "ND SABES NADAR!!!! ” "TE HAS AH06A0O.': BEEP 1,-iO: 

PAUSE 43: 60 TO 900 

2714 IF RRi'N' THEN PRINT "HAS HECHO LO ÑAS PRUDENTE...""BUSCA UN PUENTE POR 
DONDE CRUZAR' 

2720 RETURN 

2800 RRINT 1 PRINT 'TE ADENTRAS EN LA SELVA..'ANDA CON CUIDADO, NO TE VAYAS' 
"'A PERDER...' 

2801 RETURN 

2900 PRINT : PRINT 'HAS ENCONTRADO LAS LLAVES ÍUE""ABREN LOS COPRES...*: 60 SU 
B 4000: LET 0*=0*fV: LET A(IX,Í>='P’; RETURN 

3000 PRINT : PRINT 'HAS ENCONTRADO EL PRINER COFRE..': SO SUB 4000: LET 0*=WU 
': LET AÍIX.na'P': RETURN 

3100 PRINT : PRINT 'HAS ENCONTRADO EL SEGUNDO COFRE': 60 SUB 4000: LET 0í=0(*'V‘ 

: LET AdX.YIs'E*: RETURN 

3200 PRINT : PRINT 'HAS ENCONTRADO EL TERCER COFRE..': 00 SUB 4000: LET 0(=0(*'V 
*: LET A$(X,YI S 'E‘: RETURN 

3550 f PINT : PRINT 'FDR FIN HAS LLE6AD0 A UN LUGAR" "HABITADO..: 60 5UE 4000 
3510 LE' L=LEN OS: l c L04 THEN PRINT '"PERO CONO NO RECOSISTE EL DINERO" "NO 
fUEOEE VOLVER A CASA.': SO TO 900 

3520 PRINT "CON EL DINERO 8'JE HAY EN LOS" "COFRES PODRAS PASAR TU REGRESO" "A 
CASA....’ 

3530 FDR 2=-30 TO 40 STEF J: BEEP 1/100,Z: NEXi Z 
3400 PRINT AT 21,0¡'OTRA AVENTURA’ IS/N1’ 

3610 IF INKcYÍ='S' THEN RUN 

3411 IF !NKEY(=‘N' ’HEN RANDONIZE USR O 

3620 SO >0 3610 

4000 DATA 1,2,2,4,3,6,7,5,6,8,9,7,5,4,3,¡: RESTORE 4000: FOR Z=1 TO 14: READ 21: 
BEEP 1/4,21! NEXI Z: RETURN 

9000 LET R$=INKEí$: IF R(='N' QR RI-'S' THEN RETURN 
9010 60 TO 9000 

9999 SAVE 'LA ISLA'CODE 16184,PEEK 23627+256EPEEK 23628-16182: 60 TO 1 


TU BARCO HA NAUFRA¬ 
GADO Y ESTAS EN UNA 
ISLA DEL CARIBE. 
DEBERAS SALIR DE 
ALLI LLEGANDO A UN 
LUGAR HABITADO, CON 
TRES COFRES PARA PA¬ 
GAR * TU REGRESO. 
DISPONES DE UN HOPA 
CODIFICADO, QUE YA 
ENTENDERAS ??? 

EUITA TODOS LOS PE¬ 
LIGROS ! ! ! . 


PAUSE 200 


106 IF INKEY( s 'S' THEN OLS 

107 IF 1NKEY*='E' THEN CLS 

108 IF INKcYÍ='0* THEN CLS 

109 IF INKEYÍ=‘N' THE* CLS 


1 IF IHKEY1='S’ THEN 60 TO 9999 

2 PRINT AU' PAR* LA CINTA 

10 DIN 1(110,101 

20 LET a«¡l = 'NNKNNKNHNN l 
2! LEI ail2l='HPNPPUPPTN’ 

22 LET «Ill-NPCCCDSEPN- 

21 LET i(I41.'NPSSCCCSPN' 

24 LET aítSl^'HRRRFRRRRN' 

25 LET a(16l='NABBCSESHN' 

26 LET a(I71 s, NABASLETPN' 

2? LET á(i81 =, NACA6HVSPN’ 

2$ LET a(l9l='NICCCCSVSH* 

29 LET a(ll01=*NHELAEIL2N* 

30 LET X=2: LET Y=3! LET 0(=” 

40 60 SUB 4000: CLS : INPUT “ 

:oe FOR Z-l TO 5: BEEP 1/50,10: PAUSE 6: NEXT Z: BEEP 1/50,30: 60 SUB 100 B 1 C 0 DE 
AHX,n-55): PRINT AT 21,0!'NAPA (NI - DIRECCION IN,S,E,OI' 

105 If INKET(='N' THEN CLS : PRINT 'TE íIRISES AL NORTE': LET X*X*1¡ 60 TO 100 
PRINT 'TE DIRIGES AL SUR': LET X=X-U 60 TO 100 
PRINT *TE DIRIGES AL ESTE': LET Y=Y-1! 60 TO 100 
PRINT ‘TE DIRIGES AL OESTE': LET Y=M; 60 TO 100 
FOR Z=! TU 10: PRINT AT Z,l¡A((2l: NEXT Z: PRINT O 
VER l; AT X,T¡' •: PRINI AT 10,?;'Z*!AT 3,15!' SUR* i AT 4, líi**"AT IN, 1 i'OBJETOS: 
U.V.y.T-: PAUSE o 
200 60 TO 105 

900 PRINT : PRINT 'HAS NUERTO*'*'PULSA UNA TECLA PARA EMPEZAR-': BEEP 2,-10: 

PAUSE OI 60 TO 10 

1000 PRINT : PRINT 'HAS CAIDO EN ARENAS NOVEDIZAS""N0 PUEDES SALIR.': 60. TO 90 
O 

:IQ0 PRINT : PRINT 'TE ENCUENTRAS EN ZONA PANTANOSA**"TEH NUCHO CUIDADO CON...' 
"LAS ARENAS NOVEOIZAS.'I RETURN 

1200 PRINT : PRINT 'ESTAS EN EL CANINO DE TIERRA...': IF RNDÍ.5 THEN PRINT "SIS 
UE ESTE CANINO...' 

1201 RETURN 

1300 PRINT : PRINT 'HAS PENETRADO EN...""UNA OSCURA CUEVA.': IF RNDÍ.5 THEN PR 
INT : PRINT 'EN LA CUEVA HAY UN OSO, ESTE*”'TE ATACA Y NO PUEDES DEFENDERTE. 1 : 
60 TO 900 
1310 RETURN 

1400 PRINT : PRINT 'TE ADENTRASTE DEMASIADO EN LA" 1 'ESPESURA DE LA SELVA..."" 
TE HAS PERDIDO, NO SABES CONO""SALIR...*: SO TO 900 

1500 PRINT : PRINT 'VEO UN PUENTE IUE CRU2A EL RIO" "ESTA EN NUY NAL ESTADO. CR 

uzo’ - ; 6 ü sub 9000; if r(='S' then let x=Xti: FOR z=i ío 20: beep 1/100,rndíio: 

NEXT Z: PAUSE 2: 60 TO 1510 

1505 LET X=X-l: IF R(=’N' THEN PRINT : PRINT 'ENTONCES NO SE BUE PIENSAS HACER.*: 
RETURN 

1510 PRINT ! PRINT "EL PUENTE SE NA BERRUNBAOÜ.*: IF RNDÍ.7 TNEN PRINT "TE 

HAS CAIDO AL RIO...’: SO TO 900 

1520 PRINT "PERO POR SUERTE HAS LOGRADO*’ "CRUZAR!!!': RETURN 
1400 PRINT : PRINT 'FEROCES CANIBALES SURGIDOS-* "DE LA SELVA TE ATACAN" "SERAS 
SU GUISO...*: GO TO 900 

1700 PRINT : PRINT 'HAS CAIDO EN UNA TRANPA PARA '"'LEONES.""TUS HERIDAS SON 
NUY GRAVES': 60 T0 900 

1300 PRINT : PRINT 'HAS CAIDO AL NAR POR ÉSTE" ’'ACANTILADO.': SO TO 900 
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2336i 203, .193,96,203,i62+9£+33.233, -1243 

23369 127*34,176» 0 2.3 3, 100,0*34, =596 

‘2357? 20+96,33*129,92,110,30,0+ -310 

25383 34,0,96.33,33,92,233.42, -587 

33393 0,9*,123,13,33,0*0,1£3, -397 

23601 230,7,211.234,33,0,0,125, -960 

23609 133,135, 135,33,141,92, 71,126, -86© 

23617 230,199,205,152,99,33,7,0. -923 

23623 60,33,141,92,205,128,9^,33, -800 

23633 1,0,123,254,1,40,6,233, -600 

23641 203,83,132.24,4,233,203,83, -1035 

23649 24*,203,172* 96,33,10,0,235, -997 

23637 33,5,O,233,205,239,9B,205. -1020 

23663 211,97,80,83,76,0.3,65,32, -729 

23673 60,03*62.32,80,63,82,65, *529 

23681 32,69,77,00,69,90,63,82, -364 

2560* 233.203,7,99,203,119,99,111, »110Q 

23697 38,0,233,33,83,0,167,237, -793 

23703 82,194,112,1OO, 195, 113, 100, 193, -1093 

23713 93,100,33.0,0,34,16*96, -300 

23721 33,0,0,34,30,96,33,Ó, -226 

23729 0*34,10,96,42,18,96,213, -Sl7 

2573? 233,33.1,0,23,209,34.10. -335 

23745 96,33,8,207,233,42,18.96, -735 

25753 213,233,33,101,0,23.209,125, -941 


25761 10 T 42,1&,96,213,233,33,101, -756 

257*9 0,23,209,235,33,117,0,167, -786 

25777 237*82,210,197,100,33,1,0, -860 

25703 34*13,96,33,8,207,235,33, -6*4 

23793 102,0,123,18,33,7,0,69, -334 

25801 33^141,92*203,128,99,205*172, *1073 

23009 96*33,0,0,233,33,0,0, -397 

23017 233,203,239,98.203*211,97*02, -1372 

23023 69*67*79.82,68,32,68*69* -534 

25033 32,72,79,89,38,32,255,42, -63® 

25841 20*96,203,223,97,203,211,97, *1134 

2=849 32*32,32,233,33,0,0,233, *619 

25857 33 * 26*0,233,203,239,98,205, -1041 

23063 211,97,63* 46,71 * 46,68,46* -650 

23373 233,205,7,99,33*3,0,69, -671 

23001 33*141*92,205,120,99,33,1* -732 

23009 0,233,33,0,0,233*203,239, *947 

25S97 90+205,211,97*64,96,96,96, -963 

23905 90,96*96,90,96,96,96,90, -7ÓS 

23913 96+96+96,96,96,96,96,96, -760 

2592í 96 * 96 + 96 * 96 * 96,96,96,96, -760 

23929 96+96,96*63,253,203,7,99, -917 

23937 33+21,0*233*33*0*0,233, -557 

23943 203+239,90*203*211,97,64,96, -1213 

25933 96,96,96,96+96,96,96,96, -760 

23961 96,96+96*96+96*96*96,96, -76B 

23969 96*96+96*96,96,96,96,96, -768 

23977 90,96,96,96,90+63+253,203, -1003 

23983 7,®9,33+7*0+69+33+ 141 * -369 

23993 97,203,128,99*33.22*0+233, -814 

26001 33,0+0+235.205,239,90*200, -1015 

26009 211,97+80,85,78,84*79+83, -797 

26017 58,32+ 32 + 32+ 32+32+32 + 32 , -282 

26023 70,63,83,69,38+32,32+32* -441 

26033 32,32,86+73,68,65,83*30, -49? 

26041 255,203,7,99,33+0,0,34, -633 

26049 6,96.33+16,0,34,36+96, -317 

26057 33,0,0+34,24+96,33+0+ -220 

26065 0,34,34,96,33.22*0*235* -454 

26073 33*7,0+233,203.239+98.42, -839 

26081 30,96,203,223+97,33*22,0, -706 

26009 233.33,19,0,233,203,239+90+ -1064 

2609? 42,18,96,203,223,97,33+ 22 + -736 

26105 0,233,33,30+0,233,203.239, -977 

26113 9@+42.16+96+203,223,9?,203, -902 

26121 7,99+62.0,33,96*234,229. -760 

26129 193,33,216+234+233,33+6,0, -930 


26137 

26145 

26133 

26161 

26169 

2617? 

26183 

26193 

26201 

26209 

26217 

26223 

26233 

26241 

26249 

26237 

26265 

26273 

26261 

26209 

26297 

26305 

26313 

26321 

26329 

26337 

26345 

26333 

26361 

26369 

26377 

26305 

26393 

26401 

26409 

26417 

26425 

26433 

26441 

26449 

26457 

26463 

26473 

26401 

26489 

2649? 

26505 

26513 

26521 

2652® 

26337 

26543 

26533 
26561 
26377 
26585 
26393 
26601 
26609 
26617 
26623 
26633 
26641 
26649 
26637 
26663 
26673 
26681 
26689 
26697 
26703 
26713 
26721 
26729 
26737 
26743 
26753 
36761 
26769 
26777 
26705 
26793 
26001 
26809 
26817 
26025 
26S33 
26841 
26849 
26837 
26863 
26873 
26001 
26809 
26997 
26905 
26913 
26921 


203+ 138+98* 205.200,96+124,230, 
127*103,213+235,33 + 204 +12,203, 
102* 97* 209,34,46,96,42,46, 
96,213,233,33+3*0,23*209+ 

34,46,96,205*200*96* 124+ Z30, 

127+103+213+235*33*105,4,203. 
102,97,209,34*48,96+42,48. 
96,213,235,33*1,0,25,209+ 
34,48,96,42,0,96,233+33+ 

1,0,123,18,42,0+96.213, 

235,33,1,0,25,209+235.42, 
46,96,123,10+42,0,96,213+ 

235,33,2,0,25,209,233,42, 
48,96,123,18,42,0,96,213+ 

233,33,3,0,23,209,233,33, 

0+0,125,18,42,0,96,213, 

233+33,4,0,25,209,233,42, 

46,96,123,18,42,0,96,213, 
233*33+5+0+23,209.233,42, 

48,96,123+10,62,0,205 +191 , 
99*33+7+0+09,33+141,92* 

205+129*99+203,119,99+111,38, 

Oí 235* 33* 73*0, 167*237*02, 

194,27,103,42+36*96+233*33, 

1+0*167,237,82,210+27+103, 
33,20,O,235*42+36,96+233, 
203+239,98,203,211+97,32*32, 
32,253*205+7,99+42*36*96* 
213*235*33+i+0*235*167*237, 
02,209+34+36*96,33,20*0* 

233 + 42,36 + 96 +233 * 203 * 239 * 98, 
203+211+97+97,90*99.253,203, 

7,99+205,119*99,111*30+0* 
235+33,90,0,167*237*82,194, 

111, 103+ 42+36,96,233+ 33,28. 

O,167,237+82.218,111*103+33. 

20 + O * 235 + 42 + 36 * 96,235,205 * 

239 * 96,203,211,9?,32,32*32, 
233+203,7,99,42,36+96*213, 
235+33,1+0+25,209+34,36* 
96,33,20+0,233+42+30+90, 
233,203,239,90+203+211+97.97, 

98,99,233,203,7,99,203+119+ 
99,111,30+0,233+33+01,0, 
167,237,82,194+163,103,42+6+ 

96,235,33.0,0.167,237.82. 
194,165,103+ 33,1,0,34,6, 
96*33.19+0,34+42+96,42+ 
36*96+213,235+33+1,0*25, 
209*34+44,96,33+20+0+235+ 
42,36,96,235,203,239.98,203, 
211,97,97,98,99,235,205, ?, 
99.42.24,96.235+ 33,20,0, 

16?,237,82.210,22.104+62+0* 
235,33+1+0,205*150+90*33* 
£34,0,229,193+205,200+96,124, 
230,127,103,125,237,121*62,0, 
203, 191,98,62+0+ 33+ 96*234, 

229,193,33,216.234,233 + 33,6* 

O,205,138,98.42,0,9*,235+ 
33,1+0+125*18,62,0,203, 

191 + 98,33,0,O,123,230, 7 , 

211 * 254 * 195,133,100+203,119+99, 
1 1 1 + 30 + 0,235,33 + 34.0+167, 
237+02+194,39,104*201,203,43, 
104+195+106+102+33+2+0,34, 
40+96+62+0+33,96* 234 + 229, 
193+33,216,234 + 233,33*6,0, 

205 +150 +98+42*34+96* 235 * 33, 

2,0,167+237+ 02*194+43+105, 
42,6,96,235,33*1,0+167+ 

237,82,194,43 +105 + 42 + 42 + ®6 * 

235,42.44,96,235 + 205,239,98, 
205,211,97,32,233,203,7,99+ 
42,42,96,213,233+33,1,0, 

233,167,237,82,209,34.42,96* 
42,42,96,£35+ 42,44,96+ 235, 
205,239,98,203+ 211,97+101 + 233, 
203,7+99,62,19,33.1,0+ 

229,193,33+3,0,233,33,1, 

O,205,138,90,33,234,O,229, 

193 * 203,200,96,124,230,127,103, 
213 * 233,33*8,0,203,156,97* 

O,209+123,23?,121,62,19,205, 
191,98 + 42,42,96,233,33,2, 

O +167,237,82,218,43,103,42 + 
42,96+ 233.42,44,96,233,205 + 
£39+90+205+211,97,120.233.205, 
7+99+62,19+33,1,0* 229, 
193+33+so+O,233,33,1,0, 

205+130+93+33,254.0,229.193+ 
205+200,96*124,230,127,103*213, 
235+33,8*0*205,136,97,0, 

209+125+237,121.62,19,203*191, 
98 + 42 + 42 + 96,235,42,44,96, 
235+205,239,98,203,211,97, 32* 
235 * 205 + 7*99,33,0*0.34, 

6 * 96 *42,34 + 96,213,235,33, 
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-1132 

-752 

-©14 

*1031 

-1025 

-736 

-012 

-504 

-493 

-780 

-636 

-701 

-630 

*773 

-494 

-703 

-636 

-784 

-745 

*473 

- 1004 
-827 
-766 
-827 
-697 
-1119 
-772 
*1121 
-310 
-1186 
-12*7 
-678 
-1028 
-684 
-931 
-069 
-946 
-933 
-373 
-538 
-1387 
-1007 
-397 
-996 

-eso 

-336 

-362 

-639 

=671 

-1156 

-1069 

-549 

-004 

-763 , 

-1301 

-1003 

-919 

-1 1 79 

-934 

-444 

-6B4 

- i 316 
-630 
-1107 
-636 
-790 
-950 
■901 
■830 
-580 
-841 
-1 194 
*1111 
-662 

- 1102 
-832 
-1411 
-426 
-729 
-977 
-1278 

—947 

-978 

-739 

-894 

-995 

-1430 

-450 

-543 

-1170 

-1298 

-734 

-1169 

-693 

-1322 

-633 

-733 
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2a*2* l*ú*25*209,34,34,9*,42, 

2**37 34 *96*235.33,3,0,1*7,237, 

2**43 02,210,73,¿03,33,0,0.34, 

2 s *33 34,96,42,18,96,233,33,7, 

2**al 0,i67„237» 82 f 2 18 , 110,103,62, 
2 *s a * 19,33, 1 »0,229,193,33,10, 

26977 0,233,33,1,0,203,130,90, 

2* s t 5 62,19,205,i 91,90,42,0,96, 

2***3 213,233,33 *3,0,23,209.34, 

27001 50,9*,42 * 30.9*, 110,30,O, 

2700* 34,30,96,42,0,96,110,30, 

"-17 0,233,33,0,0,167,237,02, 

2^:23 194 p 151,103,193,135,100,42,0, 

27033 *6,213,233,33,1,0,23,209, 

27041 34,2,96,42,2,96,110,30, 

27049 0,34,2,96,42,0,96,213, 

27057 233,33,2,0,23,209,34,0, 

'T063 96,42,0,96,110,30,0,34, 

27073 3,96,42,2,96,34,10,*6, 

27081 42,0,96,34,12,96,203,200, 

2 7009 96*124*230,127,103,34,14,96, 

27097 42*14,96,233,33,40,117,167, 

27105 237*02,213*6*106,42,10,96, 

27113 213,233,33,1*0,23.209*34, 

27121 10,96,42,10,96,235,33,20, 

27:29 0,167,237,32,210,6*106*33, 

27137 2,0,34,10,96*42,14*96, 

27143 233,33,40,117,167*237*32*210, 

27133 34,106,42,10,96,213,235*33* 

27161 1,0,235,167,237,62,209,34. 

2716* 10,96,42,10,96,235,33,2, 

27177 0,167,237,02,210,54,106,33, 

27185 2,0,34,10.90.42,14,96, 

27193 235,33,0,64,167,237,02,210, 

27201 116 *106,205*200,96,124,230,127* 

27209 103,233,33,160,97,167,237,02, 

27217 210*116*106*42,12**6,213,235, 

27223 33*1*0*25*209,34,12,96, 

27233 42*12,96* 235,33 * 30 * O * 167 * 

2724 1 237,92 *210,116, 106» 33 * 1*0* 

27249 34,12*96*42,14*96,235,33, 

27257 O» 64,167*237,92*210*101,106» 
27265 205,200,96,124,230,127,103,235» 

27273 33,160,97,167,237,02,210,181, 

27201 106,42,12,96,213,235,33,1, 

272B9 O,233,167,237,62.209,34,12* 
27297 96,42,12,96,233,33,1,0, 

27305 167,237,02,210,181,106,33,30* 

27313 0,34*12,96,42,10,96,213, 

27321 235,33,10,0,205,156,97,0, 

27329 209,34*30,96,33,138,127,213, 

27337 233,42,30,96,235,167,237,82, 

27343 209,34,30,96,42*14* 96 * 235, 

27353 42*30,96,167,237*02,210*31, 

27361 107,42,50,96*235*33,0,0* 

27369 167 * 237 * 02,194,31*107*42*0* 

27377 96*213,233,33,3*0,23,209, 

27383 235,33,1*0,125*18,42,0, 

27393 96,213,233,33,4*0,23,209, 

27401 235,42,10,96,125,18,42,0* 

27409 96,213,233,33,5,0.25,209, 

27417 233,42,12.96,123,18,42,0, 

27423 96,213,235,33,1,0,23,209, 

27433 233*42,10,96,123,10,42,0, 

27441 96,213,233,33,2,O,25,209, 

27449 233,42*12,96*125,18*42*40* 

27437 96,69*33,141*92,205,128,99, 

274*3 42,40,96,213,233,33,1,0, 

27473 25,209.34,40,96,33,0,207* 

27481 110,38,0,34,4,96,42,2, 

27489 96,235,42,8,96* 235,205* 239, 

27497 90,203,211,97*32,253*42,10* 

27303 96,235,42,12,70*235,203,239* 

27313 90*42,4,96,125*205,114,96* 

27321 203*7*99*42,40*90,235*33, 

27329 7,0*167,237,82*210,151,107* 

27537 33,2,0,34,40,96,33,7* 

27345 0*69,33,141*92* 205 *120,99* 

27553 42,6,96,233,33,1,0*167* 

27561 237,62,194,135,108,42,44,96* 

27569 233,42,12,96,167,237*82*194» 

27377 135, i08,42,42* 96,235,42,10, 

27383 96,213,235,33*4,0,233,167, 

27393 237,02,209,167,237,82,210,133* 

27601 100,42,42,96,233,42.10,96, 

27609 213,233.33,4,0*23,209,167, 

27617 237,82,218,133,100,42,42,96* 

27 6 2"3—235 *-42794 1 ¥¿r; 2357 205 * 239,90*- 

.27633 205* 211*97,32* 235,205*7*99, 

2^ís4 1 42,10,96,235,42,12,96,233, 

27*49 205»239,98 *2Q3,211,97,120,233, 

27637 205*7*99*62*19,33,!*Q t 

27665 229 *193,33,00,0*233,33,1. 

27673 0,205,138,90,23,234,0,229, 

27*81 1 - 93 , 33 ,0.0,213, 233 ,42, 38, 

2^*09 9 0 í r05*156,97,0*209*123*237, 
27697 121,62,19,205*191,90,42,10* 

27?03 96,235,42, 12.96,233,203,2 39, 


-441 

27713 

-010 

27721 

-339 

27729 

-561 

27737 

-981 

27745 

-310 

27753 

-730 

27761 

-713 

27769 

-752 . 

27777 

-482 

27785 

-466 

27793 

-734 

27601 

-930 

27009 

-812 

27817 

-420 

27823 

-403 

27833 

■346 

2784 1 

■ 424 

27849 

-384 

27857 

-693 

27065 

-324 

27873 

-752 

27001 

-797 

27889 

-750 

27097 

-342 

27903 

-841 

27913 

-294 

27921 

-1129 

27929 

-789 

27937 

-965 

27943 

■324 

27953 

*097 

27961 

-294 

27969 

-1036 

27977 

-1204 

27985 

-1122 

27993 

-1030 

20001 

-410 

28009 

-613 

28017 

-783 

28025 

-5*2 

28033 

■ 1047 

28041 

-1320 

2804 9 

-1173 

23037 

-738 

20065 

■ 976 

2S073 

-315 

28001 

-1034 

2B089 

-511 

20097 

-736 

20105 

•eee 

28113 

-1132 

28121 

-764 

20129 

*903 

28137 

*563 

28145 

-860 

28133 

-814 

28161 

-434 

28169 

-015 

28177 

-368 

28183 

-016 

20 193 

-370 

28201 

-812 

28209 

-560 

28217 

-813 

20223 

-610 

2B233 

■863 

28241 

-660 

2S249 

-652 

20237 

-326 

28263 

-1136 

28273 

-930 

2S201 

.1160 

28289 

-700 

20297 

-757 

28305 

-961 

28313 

-243 

28321 

■ 767 

28329 

-300 

28337 

-930 

28345 

-1063 

20353 

-710 

28361 

-983 

20369 

-1339 

28377 

-671 

28385 

*886 

28393 

-960 

20401 

—*11Vü 

20409 

-lili 

28417 

-76S 

28425 

-1430 

20433 

-426 

38441 

-004 

2844 9 

*977 

20437 

-762 

20465 

-1123 

28473 

*740 

28481 

-1160 

204B9 


90,205.211,97,32,235,205*7» 
99,42,0,96,233,33,0,0, 
125,18,42,24,96.213,233,33, 
1,0,23,209,34,24,96,42, 

30,96*213,233,33,5*0.25, 

209 * 34,30,96,33,22,0,233, 
33,7*0*233,205,239*90,42, 

30 * 96 * 205 * 223*97*205,7*99. 

33,0,0,34*6,96*42,0* 

96,213*235*33*3*0,25*209, 

34* 50,96,42* 50* 96* 110*38, 
0,34,30,96,42,50,96* 235, 
33,0,0,167,237,82,194,173* 
108,193,21,110,42,0,96,213* 

233,33,4,0,23,209,34,2, 
96*42,2*96,110,38*0.34, 

2,90*42,0,96,213,235,33, 

5,0*25,209,34,0.96,42, 

@,96*110,30.0,34,0,96, 

42,2,96,233,42,0,90*233, 

203 * 239,98,203,211*97,32,233, 
205*7*99,42,2,96*213,235, 
33*1,0*25.209*34*2,96, 
42*0*96.213,233,33*4,0, 

25,209,235,42,2,96,125,18, 
42*2,96,233*33*20*0*167* 
237,82,210*132*109*33*20*0, 
34*2,96,33,20,0,233,42, 
8*96,235*203*239,98,205,211, 

97*120,233,203,7,99,62,19* 

33,1,0,229,193*33,40*0* 

235,33,1*0,205,158,98*33* 
254,0,229,193,33,8,0*213* 
235,205,200,96,124,230.127*103* 
205,156*97,0,209,125,237,121, 
62,19,205,191,98,33,20,0, 

235,42,8,96,235,203,239,98, 
203*211,97,32,255,205,7,99» 
42.0,96,213*235.33*3,0, 

25» 209,235,33»0*0»125, 18, 

193,21,110»42»2,96,235»42, 

0,96*235,205,239*90*205,211. 

97»100.255 *205*7,99,33*254, 
0*229*193,33,9,0,213,235, 
203*200,96»124*230,127,103,205, 
136,97*0*209*123,237*121,42, 
2,96*233,33,20*0,167*237* 
82,194,212,109,42,8,96*235* 
42,36,96,213*233,33,i*O* 

25,209,167,237,82,194,212,109* 
193,27,110,42,2,96,233.33* 

20,0,167,237,82,194,241*109, 
42,8,96,235,42,36,96*167, 
237,02,194,241,109,195,27,110, 
42.2*96,233,33,20*0,167, 

237,SZ,194,21,II0,42,8,96, 
233*42,36,96.213*235,33,2, 
0,23*209, 167,237* 82. 194,21, 
110,193,27,110,62,0,205,191, 
90,201,62,19,33*1*0.229, 
193,33,244,1,235»33.1,0, 

205,138,99,205,200*96,124,230, 
127* 103,213,233,33* ¿53*25,203, 
¿82*97*209*34*2,96*33,2, 
0,213,233,42*2,96,23*209* 

69,33,141*92.205,120*99.33* 
20,0,235*42,36,96,235 * 205 * 
239.98,205.211,97,117,118,119* 
255,203,7,99,33,254,0,229, 

193,33,8,0,213,235,42,38, 

96,203,156,97,0,209,125,237, 
121*62,19,205»191*98,33,20, 

0,235 * 4 2,36,96 * 233 * 203,239, 

98,205,Z11 * 97,97* 90* 99,255, 

203»7 * 99,62,0,33»96,234 * 

229*193,33,216*234*233,33,6, 
0,203,130,98,42,0.96,213* 

235 *33.3,0,25 1 209.235,33, 
0*0,123»18.62,0*205,191, 
98,33,7*0*69,33*141*92, 

205,128,99,42,16,96,213,235, 

33. 1,0,235,167,237»02,209, 

34,16.96,42*16,96,233*33* 

0,0,167,237,82*218,228,110, 

193,237,110,33,0,0.34,24. 

96,193,197*100*33*1*0,123, 
254,1,40*6*253,203,83*190» 
24,4,233,203,83,254,33,10, 

0,233 *33,11,0.233,205,239, 

90 * 205 ¡,211*97*71* 63* 77*69* 
32,32,79,06,69,82,255,205* 
7,99,33,0,0,123,234,1, 

40,6,253,203,83*190*24*4* 
233,203*83,254,62,0,33,1, 

O,229,193,33.184,11,235,33, 
1,0* 205, 158,98 * 33 *254,0» 

229*193,33,0*0,213,233*42* 

O,96,205*136,97,0,209,123, 


* 1 110 
-303 
-706 
-431 
-637 
“659 
-839 
-962 
-211 
-814 
-316 
*603 
-886 
-785 
-542 
-410 
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-390 
-756 
■1342 
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-400 
-623 
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*593 
■823 
-462 
■1297 
*064 
-529 
-763 
-930 
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-1150 
•628 
-1138 
■lili 
-622 
■645 
■743 
*1297 
■1050 
- 911 
-1290 
*987 
-790 
*978 
-656 
-1233 
-740 
-1030 
-722 
-1195 
*393 
■790 
-892 
-935 
■900 
-643 
-740 
-1316 
- 1094 
-633 
-822 
-000 

-869 
-1204 
-1032 
-762 
*1125 
-749 
-1080 
* 1 160 
- 7 J 6 
-1179 
-812 
-773 
■601 
-473 
-1034 
-964 
*368 
-1042 
*633 
■747 
■1030 
-864 
-938 
-093 
■ 040 
-319 
■803 
-089 
-910 
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2049? 

237,121,62,0,203+191 + *8 1 42, 

“95* 

288 17 

0, 12*,*,12*+ *4 T 126,0,0, 

-448 

29137 

0+126+6,24*96,126,0,0, 

-378 

28505 

30,96,233,42+20 +9*,1*7,237 * 

“923 

28825 

0,124,4,12*,*,126+0*0, 

“306 

29143 

14,8+0,0+0+14+0+0, 

-*o 

38513 

82,210.137,111,42,30,«6,34, 

“742 

28633 

0,96,102,126,6,6,0,0* 

-336 

29133 

0,64,32,16,8,4.0+0+ 

• i 24 

2B32I 

20,9*,33,12*0,233,33,10, 

“439 

28841 

O.126*64+ 126,6,126 + 0,0* 

-448 

291*1 

112,16,16,16+16,112*0*0+ 

-20S 

2B329 

O,235,205,239,90,203,211*97, 

* 1290 

28849 

0*124,64,126,70,126,0,0, 

-310 

29169 

16,36,84,1*,ió+16,0,0+ 

= 204 

28537 

78,83,69,8*,79,32,82,*9, 

-580 

28057 

0,126,6,12,24,24,0,0, 

-192 

29177 

239,247,24,12+ 247,2?1 + 0 + 0 + 

“1020 

2B543 

*7,79,82,68,233,203,7,99, 

■862 

28865 

0,60,36,126,102,126,0,0, 

-430 

29 J 85 

0+253*102,102,233,0,0+0+ 

-714 

26553 

33,144,1,1,96,3,11,120, 

-409 

28873 

O*126,66,126,A,6,0,0, 

-330 

29193 

1+1*31,37+93,93.127,193, 

-382 

283 ó: 

177,32,231,43,124,101,32,243, 

— 1083 

28881 

0,24,24 * O ,24.24,0,0, 

•9* 

29201 

1*6,101,235 + 233.233.235,255 + 0 + 

-1342 

28369 

203*172,9*,195,235,99,207,22 + 

“1231 

28089 

0,24,24,0,24,24 p 48,0, 

-144 


rtM ,-54* +"*** ‘S'St»,-55A, Aü. 


2037? 

0*0,0,0*0,0,0,0, 

-0 

20897 

0,12*24,48,24,12*0,0, 

-120 

29217 

20,40+60, ?4 * 24,24+24,0, 

-216 

2 65 05 

0 T 0,0,0,0,0,0,0, 

-0 

28*05 

0,0,62,0,62*0,0,0, 

-124 

2922? 

193,i9 3,195,0, 193,195+ 193,30 + 

= 1200 

26393 

0,0,0 * 0 * 0, o, o, 0, 

-O 

28913 

0,40,24.12,24,48*0,0, 

-15* 

29233 

127,233,253 +127,233 +126,3* *60 + 

*1241 

28*01 

0,0,0,0,0,0,0,0p 

-0 

20921 

0,232,102,10?,232,0,0,0, 

•708 

2924 1 

44,44 + 44,235,94.44+24,235, 

-804 

20*09 

0,0,0,0,0,0,0*0* 

“0 

28929 

0.63,102,102,63,0,0,0. 

•330 

29249 

133,109,233,193.231+133,66+60, 

-1302 

28*17 

0,0,0,0*0,0,0,0, 

“0 

28937 

O,126,70,126*70*70,0,0, 

-4*2 

29237 

126,719,235,i 63, 129,¿6,*o,12* + 

•1146 

28*23 

0,0,0*0,0,0,0,0* 

-0 

26945 

0,124,93,124,99,124,0,0, 

-3*8 

29263 

219.255,12*,36,*6,36,6*,235, 

= 1039 

28*33 

0,0,0,0,0,0,0,0* 

“0 

28953 

0,126,70,64,70,12**0,0, 

-43* 

29273 

133,133+189+255,163.129,235,24+ 

• 1323 

28*4 1 

0 p 0 p 0,0,0,0+0,0 + 

-0 

289*1 

0.126,70,70,70,126,0,0, 

•462 

29281 

60*90.233 * 231,66 + 36,24,24 + 

-78* 

28*49 

0,0,0, o, 0,0, o, o, 

-0 

289*9 

0,126*96,12*,9*,12*,0,0, 

“370 

?9?09 

44*94,191+191,I9i*233,60*231 , 

= 173^ 

28*37 

0,0,0,0,0,0,0*0* 

“0 

28977 

0,126,96+126+96+96,0,0* 

•540 

29297 

24 +233,133 +189,231* 24,231 + 24, 

-1131 

28**5 

0,0,0,0,0,010,0, 

-0 

28985 

0,126,64,78,70,126+0*0, 

-464 

29305 

60,90+ 126, 126, 1*5+ *0 + 90,253 + 

-972 

28*73 

0 p 0 p 0 ,0,0,0 1 0+0, 

-0 

28993 

0,98,98,126,98,98,0,0, 

“51Q 

29313 

133+109,231,193,255+231.*6,8. 

•1328 

26*81 

-16,16, 1 *, 16,0,16,0,0, 

“00 

29001 

0.24,24,24,24+24,0*0+ 

-120 

29321 

16+?,i*, 12L9,235,126, 129, 

■895 

28*89 

36,36,0,0,0,0,0,0, 

-72 

29009 

0,12,12,12,12+60,0+0* 

-IOS 

'ÍO^.2'5 

*C.76,255.153,,131+126,60, 

-1 1 16 

28*97 

O, 0 , o, o, o, o, o, o , 

-0 

2901 7 

0,100+100+126*70+70*0,0+ 

-46* 


'2*,727+171,¡61,253,12*,*0,231+ 

-1403 

28703 

0,0 1 0,0 t 0,0,0,0, 

-0 

29023 

0,96,96+96+96+120+0+0+ 

•310 

“9343 

7*.12**90*253+129+129,255,120, 

-1148 

28713 

0,0,0,0, O, 0,0,0, 

-0 

29033 

0.126,86,06+ 06+06,0+0, 

-470 

2935" 

*3+51,39+31,15+31.233,16, 

-523 

28721 

0.0,0,0,0,0,0,0+ 

-0 

2904 1 

0,126,70,70,70+70,0+0+ 

-406 

2 a 361 

16+24,109, Z 55,255*233,255,1+ 

-1230 

2B729 

8,16,0,0,0,0,0,0* 

•24 

29049 

0, 126,90,98,98, 126,0 + 0 + 

-546 

7 9 3 o 7 

130+204,220+ 2-18,2-10, 240,253+ 145, 

“1690 

28737 

6,12,24,24,12,6,0,0, 

•84 

29057 

0, 126,98,12* , 96,9*,0 * 0 + 

“342 

7 = 377 

82+36,3+192+36,74,137+30, 

-390 

28745 

96.48,24,24,40,96,0,0, 

*336 

290*5 

0,124,100,100,100,126+0+0, 

•330 

29303 

127+753.235+12?,235*12*,36.30+ 

* 121 i 

28733 

0,20,8,*2,8,20,0,0. 

•118 

29073 

0, 126,98 ,124.70,70,0*0* 

*480 

29393 

127* 253,234,235,235 * 12*,*0,0. 

= 1332 

297*1 

0,8,8,62,8,0,0,0, 

•94 

29081 

0,126,96,126,6,126,0,0* 

-480 

29401 

0,0,0,0,0,0,0,0, 

-O 

287*9 

0,0,0,0,8,8,16,0, 

-32 

29089 

0,126,24+24,24,24,0,0, 

-222 

2?409 

0.0,0+0,0,0,0,0. 

•0 

29777 

0,0, 0, *2, Op 0, 0,0, 

-62 

29097 

0,98,98,98,98,126,0,0, 

• 318 

2941 ? 

0,0,0 + 0 + 0 * 0 + 01 0 + 

*0 

28783 

0,0,0,0,24,24,0*0, 

•48 

29105 

0+98,98,98,52,24,0+0+ 

■ 370 

29423 

0+0,0,0.0+0,0+60» 

= 60 

28793 

0,2,4,8,16,32,0,0, 

-*2 

29113 

0.106,106,10*,106,126,0+0, 

-350 

29433 

*6,133+1*1,161,153,06,60+0, 

-020 

28801 

0,126.66,70,70,126,0,0, 

-458 

29121 

0+98,98,60,70,70+0,0, 

- 59* 




2B809 

0,24,8,8,28,20,0,0, 

•96 

29129 

0 +90,98,12* + 24 + 24,0+0, 

-370 





1 IF INKEY*“ "g" OR INKEVí=" G" TH-EN SAVE " MASACRE "CODE 16384,13100: GO T Q 1 

2 FRINT AT 10,10?"PARA LA CINTA": PAUSE 200 

3 L£T L-USR 23SÓ1 




Deseo suscribirme a los 11 n. os de la revista por sólo 1950 pts. 


El importe lo haré efectivo: 

□ Por giro posta! n+* —........,*+* 

O Por talón nominativo adjunto* 

□ Contra reembolso a la recepción del primer ejemplar, más gastos de envío* 


Deseo suscribirme a partir del n.° 


{inclusive}. 



Nombre y apellidos: 

Domicilio: ... 

Ciudad: ........... 

Fecha ..*. 


.. Teléfono 
Firma . 



1985- Soft Spectrum 





















En este numero vamos a empezar 
una serie de ideas de como utilizar la 
función POKE, como todos sabemos la 
función PGKE se utiliza para introducir 
un valor directamente en la memoria 
RAM de nuestro ordenador* 

En el Spectrum existe una zona de 
memoria que el ordenador necesita para 
su uso interno, esta zona es la deno¬ 
minada variables de! sistema, esta zona 
está comprendida entre la posición de 
memoria 23552 hasta la 23732. Sí tenemos 
un conocimiento profundo de lo que 
hace cada una de esas posiciones, ten¬ 
dremos un poder muy grande sobre el 
ordenador, pero si por el contrario no tas 
conocemos podremos destruir muy 
fácilmente cualquier programa que ten¬ 
gamos en ese momento en memoria. 

En números posteriores iremos descri¬ 
biendo lo que hacen todas y cada una de 
estas posiciones. 

En este número le ha tocado el turno a 
la variable CHAR5 esta variable se en¬ 
cuentra en las posiciones 23606 y 23607, 
en estas dos posiciones de memoria está 
la dirección donde se encuentra el juego 
de caracteres en la ROM, esta dirección 
está guardada en dos Bytes si queremos 
saber cual es esta dirección tendremos 
que teclear lo siguiente: 



IDEAS 




PRINT (PEEK 23606 + 256 * PEEK 23607) — 256 

La dirección que nos dé como resulta¬ 
do de esta operación será la dirección 
donde empieza el juego de caracteres en 
la ROM. El juego de caracteres tiene una 
longitud de 768 Bytes. 

Variando los datos contenidos en esta 
dirección podremos obtener efectos 
muy interesantes. 


I SE* 
i se* 

5 SE* i GTS i 

i be* «whh 

7 EEH 

1 C :sSíjT 'INTSaSLCE S9HSSE '{M 
15 ?0KE 23404,: 

■S PPtST 4T ;í ( 0i IKi/EBSE i i A* 
25 ?C*E 2549*,0 

7C =S!ir *: ;C,0¡ í*ivER5E i;AC 
55 35 T C 15 


- R=* ftmfHf 
:■ =EK t j’t I 
i RES ttHWH 
7 

‘.5 -.íjPJT ’IHTROSJCE '¡Ai 

¿0 FSP X=i T3 LEN í*-i StEF 2 
25 BQÍ-E :IÍ04;3 
3t Ffi-KT * T 3,A-ASIS Tú *0 
55 FGicE 23é5i,í 

í(! Bf.:*- A" I,K*!iAtWU T G tí*í> 
50 M7T K 

t-3 47 3,1 ¡AS 

45 21 tC 20 
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SPECTRUtl 

Bailén, 20 - I o - Izda. 
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CUESTIONARIO LIBRERIA DE SOFTWARE 



Nombre y apellido? ..... 

Edad . 

Estudios ... 

Periféricos con que cuentas ... 

En tus momentos de ocio, te dedicas a: 

□ Lectura 

□ Televisión 

□ Música 

□ Cine 

□ Deportes 
O Otros 

Opiniones sobre el contenido redacción de la revista: 

Artículo Interesante Menos Interesante Sustituir 


¿Compras otras revistas para el Spectrum? ¿Cuáles? 


¿Eres suscriptor de alguna? ¿Cuál? . 

¿Cuántas personas utilizáis el ordenador en casa? 

¿Sabes programar? ... 

¿Cómo has aprendido? . 

¿Sólo lo utilizas para juegos? .. 

¿Otras aplicaciones? .. 

¿Qué tipo de programas prefieres? . 


¿En este número cuáles han sido ¡os que más te han gustado? . 

¿Consideras que los juegos de LIBRERIA DE SOFTWARE están a tu nivel? 

¿Pierden o aumentan tu interés los programas que publicamos? . 

¿Te resulta útil la revista para el aprendizaje del manejo de tu Spectrum? 
¿Qué mejoras introducirías? ... 


¿Os gustaría una revista con listados de programas solamente? 
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SPECTRlin 



SPECTRUM 


Los Micro Drives del ZX SPECTRUM 
Utilización y aplicaciones 


Lenguaje Máquina del ZX SPECTRUM 
Subrutinas y trucos 



SPECTRlin 



SPECTRUM 


AI incrementar la capacidad 
de su Spectrum con la adición 
de un Microdrive, necesita 
una guía completa que le per¬ 
mita utilizar al máximo esta 
expansión. Para ello se descri¬ 
ben con el máximo detalle las 
técnicas de manejo de archi¬ 
vos y proceso de datos, de 
forma que pueda escribir, leer 
y cambiar datos de manera 
eficaz. 

Ahora puede programar en 
su Spectrum una AGENDA 
ELECTRONICA con listado 
diario, Se incluye un listado 
completo de este programa, 
con el que puede introducir, 
variar y borrar todos los com¬ 
promisos del año, permitién¬ 
dote obtener una copia de tos 
sucesos previstos para el día, 
cada manana. 

Ahora tiene la posibilidad 

de hacer una red de Spec- -2* : 

trums con los de sus amigos, multiplicando su capacidad en 
complejos juegos multiusuario. Se incluye una completa explicación 
con ejemplos para explotar este aspecto. 

El autor, 

Richard Hurley estudió Astrofísica en la Universidad de Londres 
ames de ejercer como profesor de matemáticas en Hurstpierpoint 
College. En la actualidad es el responsable del Departamento de 
Estudios de Ordenadores del citado centro, 


Esta obra presenta de ma¬ 
nera progresiva el ensambla¬ 
dor del microprocesador Z 80 
y su aplicación sobre el ZX 
SPECTRUM.. 

Está destinada a aquellas 
personas que desean saber 
más sobre el funcionamiento 
interno de su microordenador 
para sacarle el mejor partido, 
según sus posibilidades, y 
aumentar la velocidad de eje¬ 
cución de los programas. El 
ensamblador es, en efecto, el 
lenguaje más rápido que el 
BASIC y es el único que per¬ 
mite la ejecución de juegos 
de acción rápida de alto nivel, 

Además de las "instrucciones 
abundantemente detalladas 
del Z 80, este libro suministra 
una serie de subprogramas 
que serán excelentes ejem¬ 
plos para los principiantes, a 
los cuales permitirá fácilmen¬ 
te la ejecución de complejos programas en ensamblador. Particular¬ 
mente explica cómo escribir o dibujar en la pantalla o en la 
impresora, programar Ea salida sonora o la salida del cassette y 
detectar las teclas pulsadas en el teclado. 

Es un útil Indispensable para todo aquel que desee programar en 
ensamblador sobre el ZX SPECTRUM, 


IOS 

MICRO ORIVES 
Da ZX SPECTRUM 

UTILIZACION Y APLICACIONES 



LENGUAJE 
MAQUINA DEL 







* I-a mayor variedad de libros de nvi ero informa tica, 
capaces de satisfacer todas sus necesidades, ya sean 
profesionales, familiares, culturales... 

* Todo tipo de información bibliográfica sobre micro- 
ordenadores, desde AMSTRAD a Sinclair QL 


TARJETA DE PEDIDO 


Domicilio de envíos: 





... N.°.... 

.. Piso.. Pta... 

| C. P... Ciudad.. 

. Provincia.... 




Ruego sírvanse remitirme CONTRA REEMBOLSO los siguientes libros: 


Número 

Cantidad 

TÍTULO Y AUTOR 

Importe 






























Fecha.. F <to- 
























































TU MICRO EN SU MESA 


Esta mesa ocupa un espacio mínimo permitiéndote tener en un mismo espacio todo tu equipo, su 
sistema de plataforma desplazable impone la distancia visual recomendada del monitor/T.V. 



DIMENSIONES: Cerrada: 0,74 X 0,50 X 0,73 m. 

Abierta: 0,74 X 0,84 X 0,73 m. 

CARACTERISTICAS: 

• Se fabrica en los siguientes acabados: Tablero bilaminado nogal, roble y blanco. 

• Se entrega desarmado, en un embalaje de cartón, 

• El montaje es sencillo, mediante un sistema de atornillados de alta penetrabilidad con llave exagonal 
que se adjunta. 

• Todo el cableado desaparece de la vista, evitándose el enredo tradicional ocasionante de caídas y 
accidentes. 

• El depósito de cassettes es totalmente visible y accesible. 

• En la mesa auxiliar, Mod. 002, además de la impresora se pueden colocar cassettes, listados, libros, 
etcétera. 

CONDICIONES DE VENTA: 

• El pedido será servido de forma inmediata contrareembolso siendo por cuenta del comprador los 
gastos de transporte. 


Distribuidor: 

EDITORIAL GTS 
C/. Bailón, 20. 1.° Izda. 
28005 MADRID 


























